home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / OSP5020.M3 < prev    next >
Encoding:
Text File  |  1996-04-01  |  4.3 KB  |  158 lines
  1. name Okuma OSP5020
  2.  
  3. % 00
  4. O >4
  5. N >4
  6. G >2
  7. g >2 G
  8. X ->3.>4
  9. Y ->3.>4
  10. Z ->3.>4
  11. x ->3.>4 X
  12. y ->3.>4 Y
  13. z ->3.>4 Z
  14.   #A ->3.>4
  15. I ->3.>4
  16. J ->3.>4
  17. K ->3.>4
  18. Q ->3.>4
  19. R ->3.>4
  20. P >40
  21. F >3.>4 Limit 0 100
  22. H >2
  23. h >2 H
  24. D >2
  25. T >2
  26. M >2
  27. S >4
  28. a >2
  29. b >3.3
  30. c >3.3
  31. d 00
  32.  
  33. ModalLetters X Y Z F R                # List of letters that are modal    
  34.  
  35. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  36.  
  37. Sequence#s N 1 1 0                    # Char, freq, incr & start          
  38. First#? N                             # Y or N  'Output 1st sequence no.  
  39. Last#? N                              # Y or N  'Output last sequence no. 
  40.  
  41. HCode X                               # X or X U  'Horizontal char.       
  42. VCode Y                               # Y or Y V  'Vertical char.         
  43. Dcode Z                               # Depth char.                       
  44. FeedCode F                            # Feed rate char.                   
  45. Spaces? Y                             # Y or N  'Spaces between words     
  46.  
  47. Comment ( )                           # Begin End comment char.           
  48.  
  49. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  50. Coolant 8 9 7                         # On, Off & Mist m codes            
  51. LComp 56 53                           # On & Off codes                    
  52. DComp 41 42 40                        # Left, Right & Cancel m codes      
  53.  
  54.  # CDC P Q                            # Cincinnati style DComp vectors    
  55.  
  56. Feed G1                             # Linear move                       
  57. Rapid G0                            # Rapid positioning word            
  58. Cw G2                               # Circular move clockwise           
  59. Ccw G3                              # Circular move counter clockwise   
  60.  
  61. CtrCode I J                           # I J or R or I J K L               
  62. Helical? N
  63. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  64. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  65.  
  66. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  67.  
  68. Incremental? N                        # Y or N  'Inc or abs output        
  69.  
  70. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  71.  
  72. WorkDefault 1                         # Work offset register default      
  73.  
  74.  
  75. Drill                                 # Drilling canned/manual cycle      
  76. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  77. end cancel
  78.  
  79. Peck                                  # Pecking canned/manual cycle       
  80. G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
  81. end cancel
  82.  
  83. Tap                                   # Tapping canned/manual cycle       
  84. G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  85. end cancel
  86.  
  87. LTap                                  # Left handed tapping cycle         
  88. G74 X[H] Y[V] Z[D] R[Vclear] F[Frate] Q[VBite]
  89. end cancel
  90.  
  91. Ream                                  # Reaming canned/manual cycle       
  92. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  93. end cancel
  94.  
  95. Bore                                  # Boring canned/manual cycle        
  96. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  97. end cancel
  98.  
  99. Back                                  # Back boring canned/manual cycle   
  100. G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  101. end cancel
  102.  
  103. Cancel                                # Cancel a canned/manual cycle      
  104. G80
  105. end
  106.  
  107. StartCode                             # Start of the program              
  108. %0
  109. O[Program#]
  110. G90 G80 G40 G17
  111. End
  112.  
  113. 1stToolChange                         # First tool change                 
  114. T[NextTool]
  115. G15 H[Work]
  116. M[Direct] S[Speed]
  117. G0 X[H] Y[V]
  118. G56 Z[D] H[Lcomp] a[Tool] b[Tooldiam] c[ToolRad] d0
  119. M[Cool]
  120. End
  121.  
  122. Infeed                                # Enable cutter comp                
  123. G1 Z[D] F[Plunge]
  124. G[Side] X[H] Y[V] D[DComp] F[FRate]
  125. end
  126.  
  127. Outfeed                               # Disable cutter comp               
  128. G1 G40 X[H] Y[V]
  129. Z[D]
  130. end
  131.  
  132. ToolChange                            # Secondary tool changes            
  133. M5 M9
  134. g0 z20
  135. M6
  136. T[NextTool]
  137. G15 H[Work]
  138. M[Direct] S[Speed]
  139. G0 X[H] Y[V]
  140. G56 Z[D] H[Lcomp] a[Tool] b[Tooldiam] c[ToolRad] d0
  141. M[Cool]
  142. End
  143.  
  144. EndCode                               # End of the program                
  145. M5 M9
  146. g0 z20
  147. g0 y20 T[Tool1]
  148. M6
  149. M2
  150. %0
  151. End
  152.  
  153. Replace "a" with "(USING TOOL# "
  154. Replace "b" with " DIAM: "
  155. Replace "c" with " C.RAD: "
  156. Replace "d" with ")"
  157. Replace "N0O" with "O"
  158.